object DM: TDM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 453
  Top = 126
  Height = 616
  Width = 451
  object Banco: TSQLConnection
    ConnectionName = 'Banco'
    DriverName = 'Interbase'
    GetDriverFunc = 'getSQLDriverINTERBASE'
    LibraryName = 'dbexpint.dll'
    LoginPrompt = False
    Params.Strings = (
      'DriverName=Interbase'
      'Database=localhost:C:\Banco\Banco.fdb'
      'RoleName=RoleName'
      'User_Name=sysdba'
      'Password=masterkey'
      'ServerCharSet='
      'SQLDialect=3'
      'BlobSize=-1'
      'CommitRetain=False'
      'WaitOnLocks=True'
      'ErrorResourceFile='
      'LocaleCode=0000'
      'Interbase TransIsolation=ReadCommited'
      'Trim Char=False')
    VendorLib = 'gds32.dll'
    Connected = True
    Left = 24
    Top = 16
  end
  object sdsCidade: TSQLDataSet
    CommandText = 'select * from CIDADE '
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 96
    Top = 8
  end
  object dspcidade: TDataSetProvider
    DataSet = sdsCidade
    Left = 168
    Top = 8
  end
  object cdscidade: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspcidade'
    Left = 232
    Top = 8
  end
  object sdsCliente: TSQLDataSet
    CommandText = 'select * from CLIENTE'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 96
    Top = 64
  end
  object cdsCliente: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCliente'
    Left = 232
    Top = 64
  end
  object dspCliente: TDataSetProvider
    DataSet = sdsCliente
    Left = 168
    Top = 64
  end
  object sdsVendedor: TSQLDataSet
    CommandText = 'select * from VENDEDOR'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 96
    Top = 120
  end
  object dspVendedor: TDataSetProvider
    DataSet = sdsVendedor
    Left = 168
    Top = 120
  end
  object cdsVendedor: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspVendedor'
    Left = 240
    Top = 120
  end
  object cdsProduto: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspProduto'
    Left = 240
    Top = 176
  end
  object dspProduto: TDataSetProvider
    DataSet = sdsProduto
    Left = 168
    Top = 176
  end
  object sdsProduto: TSQLDataSet
    CommandText = 'select * from PRODUTO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 96
    Top = 176
  end
  object cdsIVenda: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspIVenda'
    Left = 240
    Top = 232
  end
  object dspIVenda: TDataSetProvider
    DataSet = sdsIvenda
    Left = 176
    Top = 232
  end
  object sdsIvenda: TSQLDataSet
    CommandText = 'select * from ITEMVENDA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 96
    Top = 232
  end
  object sdsVenda: TSQLDataSet
    CommandText = 'select * from VENDA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 96
    Top = 288
  end
  object cdsVenda: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspVenda'
    Left = 240
    Top = 288
  end
  object dspVenda: TDataSetProvider
    DataSet = sdsVenda
    Left = 176
    Top = 280
  end
  object cdsCategoria: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCategoria'
    Left = 248
    Top = 344
  end
  object dspCategoria: TDataSetProvider
    DataSet = sdsCategoria
    Left = 168
    Top = 344
  end
  object sdsCategoria: TSQLDataSet
    CommandText = 'select * from CATEGORIA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 88
    Top = 344
  end
  object qConsulta: TSQLQuery
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 344
    Top = 40
  end
  object cdsContasReceber: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspContasReceber'
    Left = 288
    Top = 400
  end
  object dspContasReceber: TDataSetProvider
    DataSet = sdsContasReceber
    Left = 176
    Top = 400
  end
  object sdsContasReceber: TSQLDataSet
    CommandText = 'select * from CONTASRECEBER'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 64
    Top = 400
  end
  object cdsFornecedor: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspFornecedor'
    Left = 264
    Top = 464
  end
  object dspFornecedor: TDataSetProvider
    DataSet = sdsFornecedor
    Left = 184
    Top = 472
  end
  object sdsFornecedor: TSQLDataSet
    CommandText = 'select * from FORNECEDOR'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 88
    Top = 464
  end
  object sdsProximoCodigo: TSQLDataSet
    MaxBlobSize = -1
    Params = <>
    SQLConnection = Banco
    Left = 344
    Top = 128
  end
end
